vector->list   scheme


Defined in:  https://github.com/digego/extempore/tree/v0.8.9/runtime/init.xtm

Implementation

(define (vector->list v)
  (let loop ((n (pred (vector-length v))) (l '()))
    (if (= n -1)
        l
        (loop (pred n) (cons (vector-ref v n) l)))))


Back to Index